home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•Interesting Stuff•
/
I-CHING v1.0 •••
/
I-CHING v1.0 еее
/
card_5297.txt
< prev
next >
Wrap
Text File
|
1990-10-02
|
2KB
|
95 lines
-- card: 5297 from stack: in.0 –µ–µ–µ
-- bmap block id: 23003
-- flags: 0000
-- background id: 2604
-- name:
-- part 1 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=450 top=294 right=326 bottom=490
-- title width / last selected line: 0
-- icon id / first selected line: 1016 / 1016
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return1
----- HyperTalk script -----
on mouseUp
visual effect wipe right
go to card id 2225
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=115 top=222 right=239 bottom=195
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Attributes
----- HyperTalk script -----
on mouseUp
visual effect wipe left
go to card id 2545
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=195 top=286 right=303 bottom=278
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Hexagrams1
----- HyperTalk script -----
on mouseUp
visual effect wipe left
go to card id 4936
end mouseUp
-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=55 top=305 right=326 bottom=109
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Not Here!
----- HyperTalk script -----
on mouseUp
answer "Not this asterisk, but the asterisk above!" with "Not OK" or "OK"
if it is "Not OK" then
answer "You must me a IBM user!" with "Yep!" or "No Way!"
if it is "No Way!" then
answer "Good for you!"
else
answer "Grrrrr..."
end if
end if
end mouseUp